/*
** wclreol.c
**
** Pictor, Version 1.51, Copyright (c) 1992-94 SoftCircuits
** Redistributed by permission.
*/

#include <stdio.h>
#include "pictor.h"


/*
** Clears from the current window pane column to the end of
** the current window pane line.
*/
void wcleareol(void)
{
	if(_PL_winhead != NULL) {
		if((unsigned)_CURR_WPANE.row < (unsigned)getwrows() &&
			(unsigned)_CURR_WPANE.column < (unsigned)getwcols()) {

			setvpos(_CURR_WPANE.top + _CURR_WPANE.row + 1,
				_CURR_WPANE.left + _CURR_WPANE.column + 1);
			vcolor(_CURR_WPANE.color);
			vrepc(' ',getwcols() - _CURR_WPANE.column);
		}
	}

} /* wcleareol */
